home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Interactive Media Design Review 1999
/
Interactive Media Design Review 1999.iso
/
pc
/
allfiles
/
angry
/
intro.dir
/
00002_Script_cursorPrep & AnimatePrep
< prev
next >
Wrap
Text File
|
1999-03-01
|
1KB
|
42 lines
global oldMouseP, cursorSpr
global drops
global animate
global gravite
on enterFrame
if not(soundBusy(1)) then puppetSound 1, member "fuckhead"
set oldMouseP = point(0,0)
set cursorSpr = 42
set drops = []
repeat with a = 30 to 41
append drops, new(script "dropz", a)
end repeat
set nikChan = 12
set tomChan = 9
set benChan = 10
set JeaChan = 11
set nikAnim = ["Fly"]
set tomAnim = []
set jeaAnim = ["chix1"]
set benAnim = ["stretch_1", "stretch_2", "stretch_3", "stretch_4", "stretch_5",¼
"stretch_6", "stretch_7", "stretch_8"]
set animate = [new(script "animatez", tomChan, tomAnim), ¼
new(script "animatez", benChan, benAnim)]
set gravite = [new(script "gravity", nikChan, nikAnim, 0), ¼
new(script "gravity", jeaChan, jeaAnim, the number of member "soft")]
repeat with i = 5 to 7 --navbar & quit & credits
puppetsprite i, TRUE
end repeat
end